home *** CD-ROM | disk | FTP | other *** search
- object FormPref: TFormPref
- Left = 250
- Top = 166
- BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
- BorderStyle = bsDialog
- Caption = 'Preferences'
- ClientHeight = 345
- ClientWidth = 392
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poMainFormCenter
- OnClose = FormClose
- PixelsPerInch = 96
- TextHeight = 13
- object Button1: TButton
- Left = 78
- Top = 312
- Width = 75
- Height = 25
- Caption = '&OK'
- Default = True
- TabOrder = 1
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 158
- Top = 312
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- TabOrder = 2
- OnClick = Button2Click
- end
- object PageControl1: TPageControl
- Left = 0
- Top = 0
- Width = 393
- Height = 305
- ActivePage = TabSheet1
- TabOrder = 0
- TabStop = False
- object TabSheet1: TTabSheet
- Caption = 'Connection Settings'
- object GroupBox1: TGroupBox
- Left = 8
- Top = 8
- Width = 369
- Height = 81
- Caption = 'Connection Type'
- TabOrder = 0
- object Phone: TRadioButton
- Left = 16
- Top = 24
- Width = 321
- Height = 17
- HelpContext = 17
- Caption = 'I connect to the internet using my phoneline.'
- Checked = True
- TabOrder = 0
- TabStop = True
- end
- object LAN: TRadioButton
- Left = 16
- Top = 48
- Width = 321
- Height = 17
- HelpContext = 18
- Caption = 'I connect to the internet using a LAN or "always on" DSL.'
- TabOrder = 1
- end
- end
- object GroupBox4: TGroupBox
- Left = 8
- Top = 104
- Width = 369
- Height = 81
- Caption = 'Socket Buffer Size'
- TabOrder = 1
- object Label4: TLabel
- Left = 32
- Top = 56
- Width = 57
- Height = 17
- AutoSize = False
- Caption = 'Buffer Size:'
- end
- object Label5: TLabel
- Left = 16
- Top = 16
- Width = 337
- Height = 33
- AutoSize = False
- Caption =
- 'Setting a smaller buffer can increase performance sometimes. Max' +
- ' is 1514 for an ethernet connection, not recommended to go below' +
- ' 512.'
- WordWrap = True
- end
- object EditBuffer: TEdit
- Left = 96
- Top = 54
- Width = 33
- Height = 21
- HelpContext = 19
- TabOrder = 0
- Text = '1514'
- OnKeyPress = EditBufferKeyPress
- end
- end
- object GroupBox3: TGroupBox
- Left = 8
- Top = 204
- Width = 369
- Height = 57
- Caption = 'File Sharing'
- TabOrder = 2
- object Label3: TLabel
- Left = 16
- Top = 26
- Width = 121
- Height = 17
- AutoSize = False
- Caption = 'While transferring files :'
- end
- object ComboShare: TComboBox
- Left = 128
- Top = 24
- Width = 233
- Height = 21
- HelpContext = 20
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- Items.Strings = (
- 'Do not deny access from other applications'
- 'Deny read access from other applications'
- 'Deny write access from other applications'
- 'Deny all access from other applications')
- end
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'Timeout Settings'
- ImageIndex = 1
- object GroupBox2: TGroupBox
- Left = 8
- Top = 8
- Width = 369
- Height = 81
- Caption = 'Timeout'
- TabOrder = 0
- object Label1: TLabel
- Left = 24
- Top = 24
- Width = 145
- Height = 17
- AutoSize = False
- Caption = 'Set connection to timeout after'
- end
- object Label2: TLabel
- Left = 224
- Top = 24
- Width = 129
- Height = 17
- AutoSize = False
- Caption = 'seconds with no activity.'
- end
- object Time: TEdit
- Left = 172
- Top = 22
- Width = 33
- Height = 21
- HelpContext = 21
- ReadOnly = True
- TabOrder = 0
- Text = '30'
- end
- object UpDown1: TUpDown
- Left = 205
- Top = 22
- Width = 15
- Height = 21
- HelpContext = 21
- Associate = Time
- Min = 1
- Max = 300
- Position = 30
- TabOrder = 1
- Thousands = False
- Wrap = False
- end
- object CheckTimeout: TCheckBox
- Left = 24
- Top = 48
- Width = 137
- Height = 17
- HelpContext = 22
- Caption = 'Disable Timeout setting'
- TabOrder = 2
- OnClick = CheckTimeoutClick
- end
- end
- object GroupBox5: TGroupBox
- Left = 8
- Top = 104
- Width = 369
- Height = 81
- Caption = 'Keep Alive'
- TabOrder = 1
- object Label6: TLabel
- Left = 24
- Top = 48
- Width = 89
- Height = 17
- AutoSize = False
- Caption = 'Send NOOP every'
- end
- object Label7: TLabel
- Left = 168
- Top = 48
- Width = 169
- Height = 17
- AutoSize = False
- Caption = 'seconds when there is no activity.'
- end
- object CheckAlive: TCheckBox
- Left = 24
- Top = 24
- Width = 137
- Height = 17
- HelpContext = 23
- Caption = 'Keep Connection Alive'
- Enabled = False
- TabOrder = 0
- end
- object Noop: TEdit
- Left = 116
- Top = 46
- Width = 33
- Height = 21
- HelpContext = 24
- Enabled = False
- ReadOnly = True
- TabOrder = 1
- Text = '120'
- end
- object UpDown2: TUpDown
- Left = 149
- Top = 46
- Width = 15
- Height = 21
- HelpContext = 24
- Associate = Noop
- Enabled = False
- Min = 1
- Max = 300
- Position = 120
- TabOrder = 2
- Thousands = False
- Wrap = False
- end
- end
- end
- end
- object ButHelp: TButton
- Left = 240
- Top = 312
- Width = 75
- Height = 25
- Caption = '&Help'
- TabOrder = 3
- OnClick = ButHelpClick
- end
- end
-